home *** CD-ROM | disk | FTP | other *** search
/ IRIX 6.2 Development Libraries / SGI IRIX 6.2 Development Libraries.iso / dist / complib.idb / usr / share / catman / p_man / cat3 / complib / clanhs.z / clanhs
Text File  |  1996-03-14  |  3KB  |  133 lines
  1.  
  2.  
  3.  
  4. CCCCLLLLAAAANNNNHHHHSSSS((((3333FFFF))))                                                          CCCCLLLLAAAANNNNHHHHSSSS((((3333FFFF))))
  5.  
  6.  
  7.  
  8. NNNNAAAAMMMMEEEE
  9.      CLANHS - return the value of the one norm, or the Frobenius norm, or the
  10.      infinity norm, or the element of largest absolute value of a Hessenberg
  11.      matrix A
  12.  
  13. SSSSYYYYNNNNOOOOPPPPSSSSIIIISSSS
  14.      REAL FUNCTION CLANHS( NORM, N, A, LDA, WORK )
  15.  
  16.          CHARACTER NORM
  17.  
  18.          INTEGER   LDA, N
  19.  
  20.          REAL      WORK( * )
  21.  
  22.          COMPLEX   A( LDA, * )
  23.  
  24. PPPPUUUURRRRPPPPOOOOSSSSEEEE
  25.      CLANHS  returns the value of the one norm,  or the Frobenius norm, or the
  26.      infinity norm,  or the  element of  largest absolute value  of a
  27.      Hessenberg matrix A.
  28.  
  29.  
  30. DDDDEEEESSSSCCCCRRRRIIIIPPPPTTTTIIIIOOOONNNN
  31.      CLANHS returns the value
  32.  
  33.         CLANHS = ( max(abs(A(i,j))), NORM = 'M' or 'm'
  34.                  (
  35.                  ( norm1(A),         NORM = '1', 'O' or 'o'
  36.                  (
  37.                  ( normI(A),         NORM = 'I' or 'i'
  38.                  (
  39.                  ( normF(A),         NORM = 'F', 'f', 'E' or 'e'
  40.  
  41.      where  norm1  denotes the  one norm of a matrix (maximum column sum),
  42.      normI  denotes the  infinity norm  of a matrix  (maximum row sum) and
  43.      normF  denotes the  Frobenius norm of a matrix (square root of sum of
  44.      squares).  Note that  max(abs(A(i,j)))  is not a  matrix norm.
  45.  
  46.  
  47. AAAARRRRGGGGUUUUMMMMEEEENNNNTTTTSSSS
  48.      NORM    (input) CHARACTER*1
  49.              Specifies the value to be returned in CLANHS as described above.
  50.  
  51.      N       (input) INTEGER
  52.              The order of the matrix A.  N >= 0.  When N = 0, CLANHS is set to
  53.              zero.
  54.  
  55.      A       (input) COMPLEX array, dimension (LDA,N)
  56.              The n by n upper Hessenberg matrix A; the part of A below the
  57.              first sub-diagonal is not referenced.
  58.  
  59.  
  60.  
  61.  
  62.  
  63.                                                                         PPPPaaaaggggeeee 1111
  64.  
  65.  
  66.  
  67.  
  68.  
  69.  
  70. CCCCLLLLAAAANNNNHHHHSSSS((((3333FFFF))))                                                          CCCCLLLLAAAANNNNHHHHSSSS((((3333FFFF))))
  71.  
  72.  
  73.  
  74.      LDA     (input) INTEGER
  75.              The leading dimension of the array A.  LDA >= max(N,1).
  76.  
  77.      WORK    (workspace) REAL array, dimension (LWORK),
  78.              where LWORK >= N when NORM = 'I'; otherwise, WORK is not
  79.              referenced.
  80.  
  81.  
  82.  
  83.  
  84.  
  85.  
  86.  
  87.  
  88.  
  89.  
  90.  
  91.  
  92.  
  93.  
  94.  
  95.  
  96.  
  97.  
  98.  
  99.  
  100.  
  101.  
  102.  
  103.  
  104.  
  105.  
  106.  
  107.  
  108.  
  109.  
  110.  
  111.  
  112.  
  113.  
  114.  
  115.  
  116.  
  117.  
  118.  
  119.  
  120.  
  121.  
  122.  
  123.  
  124.  
  125.  
  126.  
  127.  
  128.  
  129.                                                                         PPPPaaaaggggeeee 2222
  130.  
  131.  
  132.  
  133.